home *** CD-ROM | disk | FTP | other *** search
/ Merciful 1 / Merciful - Disc 1.iso / software / r / rexx_plus_compiler / rexxpluscompiler2.dms / in.adf / Examples / ttx / TTX_ARexx.dfn < prev    next >
Encoding:
Text File  |  1991-11-01  |  5.6 KB  |  525 lines
  1.  
  2. /** $VER: TTX_ARexx.dfn 1.0 (9/9/91)
  3.  **
  4.  ** This definition file contains definitions necessary to use TurboText as a
  5.  ** ARexx programmer's editor.
  6.  **
  7.  ** Written by Steven D. Kapplin
  8.  **/
  9.  
  10.  
  11. MENUS: APPEND
  12.     MENU "RexxPlus"
  13.       BAR
  14.       ITEM "Compile Only [F8]"    ""    ExecArexxMacro TTrx:RxPCompile C
  15.       ITEM "Compile/Link [F9]"    ""    ExecARexxMacro TTrx:RxPCompile X
  16.       ITEM "Next Error  [F10]"    ""    ExecARexxMacro TTrx:NextError
  17.       BAR
  18.  
  19. #
  20.  
  21. KEYBOARD: APPEND
  22.     F8    ExecArexxMacro TTrx:RxPCompile C
  23.     F9    ExecARexxMacro TTrx:RxPCompile X
  24.     F10    ExecARexxMacro TTrx:NextError
  25.  
  26. #
  27.  
  28. DICTIONARY:
  29. /* Commands and keywords */
  30.  
  31.     ADDRESS
  32.     ARG
  33.     BREAK
  34.     CALL
  35.     DO
  36.     DROP
  37.     ECHO
  38.     ELSE
  39.     END
  40.     EXIT
  41.     IF
  42.     INTERPRET
  43.     ITERATE
  44.     LEAVE
  45.     NOP
  46.     NUMERIC
  47.     OPTIONS
  48.     OTHERWISE
  49.     PARSE
  50.     PROCEDURE
  51.     PULL
  52.     PUSH
  53.     QUEUE
  54.     RC
  55.     RESULT
  56.     RETURN
  57.     SAY
  58.     SELECT
  59.     SHELL
  60.     SIGNAL
  61.     THEN
  62.     TRACE
  63.     UPPER
  64.     WHEN
  65.     COMMAND
  66.     VALUE
  67.     WHILE
  68.     UNTIL
  69.     FOR
  70.     FOREVER
  71.     DIGITS
  72.     FUZZ
  73.     FORM
  74.     SCIENTIFIC
  75.     ENGINEERING
  76.     FAILAT
  77.     PROMPT
  78.     RESULTS
  79.     EXTERNAL
  80.     SOURCE
  81.     VAR
  82.     VERSION
  83.     EXPOSE
  84.     ON
  85.     OFF
  86.     BREAK_C
  87.     BREAK_D
  88.     BREAK_E
  89.     BREAK_F
  90.     ERROR
  91.     HALT
  92.     IOERR
  93.     NOVALUE
  94.     SYNTAX
  95.  
  96. /* Standard Functions  */
  97.  
  98.     abbrev
  99.     abs
  100.     addlib
  101.     address(
  102.     arg(
  103.     b2c
  104.     bitand
  105.     bitchg
  106.     bitclr
  107.     bitcomp
  108.     bitor
  109.     bitset
  110.     bittst
  111.     bitxor
  112.     c2b
  113.     c2d
  114.     c2x
  115.     center
  116.     centre
  117.     close
  118.     compress
  119.     compare
  120.     copies
  121.     d2c
  122.     datatype
  123.     delstr
  124.     delword
  125.     eof
  126.     errortext
  127.     exists
  128.     export
  129.     freespace
  130.     getclip
  131.     getspace
  132.     hash
  133.     import
  134.     index
  135.     insert
  136.     lastpos
  137.     left
  138.     length
  139.     max
  140.     min
  141.     open
  142.     overlay
  143.     pos
  144.     pragma
  145.     random
  146.     randu
  147.     readch
  148.     readln
  149.     remlib
  150.     reverse
  151.     right
  152.     seek
  153.     setclip
  154.     show
  155.     sign
  156.     space
  157.     storage
  158.     strip
  159.     substr
  160.     subword
  161.     symbol
  162.     time
  163.     trace
  164.     translate
  165.     trim
  166.     upper
  167.     value
  168.     verify
  169.     word
  170.     wordindex
  171.     wordlength
  172.     words
  173.     writech
  174.     writeln
  175.     x2c
  176.     xrange
  177.  
  178. /* Standard Support Library Functions */
  179.  
  180.     allocmem
  181.     closeport
  182.     freemem
  183.     getarg
  184.     getpkt
  185.     openport
  186.     reply
  187.     showdir
  188.     showlist
  189.     statef
  190.     waitpkt
  191.  
  192. /* New Standard Functions */
  193.  
  194.     d2x
  195.     date
  196.     digits
  197.     find
  198.     form
  199.     fuzz
  200.     lines
  201.     sourceline
  202.     trunc
  203.     x2d
  204.  
  205. /* New Support Library Functions */
  206.  
  207.     baddr
  208.     delay
  209.     delete
  210.     forbid
  211.     makedir
  212.     next
  213.     null
  214.     offset
  215.     permit
  216.     rename
  217.  
  218. /* RexxPlus extensions */
  219.  
  220.     b2d
  221.     b2o
  222.     b2x
  223.     c2o
  224.     d2o
  225.     linesize
  226.     lines
  227.     queued
  228.  
  229. /* RexxPlus transcendentals */
  230.  
  231.     asin
  232.     asinh
  233.     atan
  234.     atanh
  235.     atan2
  236.     ceil
  237.     cos
  238.     cosh
  239.     cot
  240.     cotan
  241.     csc
  242.     exp
  243.     fabs
  244.     fact
  245.     floor
  246.     int
  247.     ln
  248.     log
  249.     log10
  250.     nint
  251.     pow
  252.     power
  253.     sec
  254.     sin
  255.     sinh
  256.     sqrt
  257.     tan
  258.     tanh
  259.     xtoy
  260.  
  261. /* rx_intui.library functions */
  262.  
  263.     GetScreen
  264.     GetWindow
  265.     EndWindow
  266.     EndScreen
  267.     AddMenu
  268.     AddItem
  269.     AddSub
  270.     SetMenu
  271.     FreeMenu
  272.     Text
  273.     Erase
  274.     SetDraw
  275.     AddGadget
  276.     WaitMsg
  277.     ModIDCMP
  278.     SetTime
  279.     ModGadg
  280.     GInfo
  281.     OnOffGadg
  282.     MoveView
  283.     Peek
  284.     Poke
  285.     RedrawWin
  286.     FBox
  287.     Line
  288.     Input
  289.     MsgOne
  290.     MsgThree
  291.     IFFLoad
  292.     IFFSave
  293.     Color
  294.     Print
  295.     GetFIO
  296.     EndFIO
  297.     FIOWindow
  298.     FIONW
  299.     AddEntry
  300.     NewEntryList
  301.     ClearEntries
  302.     DeleteEntry
  303.     FirstEntry
  304.     IsEntryThere
  305.     GetPath
  306. #
  307.  
  308. /* Common templates */
  309.  
  310. TEMPLATES:
  311.  
  312.     "call @()"
  313.     "select*n    when @*n*nend"
  314.     "do @*n*nend"
  315.     "if @ then"
  316.     "abbrev(@)"
  317.     "abs(@)"
  318.     "addlib(@)"
  319.     "arg(@,)"
  320.     "b2c(@)"
  321.     "bitand(@,,)"
  322.     "bitchg(@,)"
  323.     "bitclr(@,)"
  324.     "bitcomp(@,,)"
  325.     "bitor(@,,)"
  326.     "bitset(@,)"
  327.     "bittst(@,)"
  328.     "bitor(@,,)"
  329.     "c2b(@)"
  330.     "c2x(@)"
  331.     "center(@,,)"
  332.     "close(@)"
  333.     "compress(@,)"
  334.     "compare(@,,)"
  335.     "copies(@,)"
  336.     "d2c(@)"
  337.     "datatype(@,)"
  338.     "delstr(@,,)"
  339.     "delword(@,,)"
  340.     "eof(@)"
  341.     "errortext(@)"
  342.     "exists(@)"
  343.     "export(@,,,)"
  344.     "freespace(@,)"
  345.     "getclip('@')"
  346.     "getspace(@)"
  347.     "hash(@)"
  348.     "import(@,)"
  349.     "index(@,,)"
  350.     "insert(@,,,,)"
  351.     "lastpos(@,,)"
  352.     "left(@,,)"
  353.     "length(@)"
  354.     "max(@,)"
  355.     "min(@,)"
  356.     "open(@,,)"
  357.     "overlay(@,,,,)"
  358.     "pos(@,,)"
  359.     "pragma('@',)"
  360.     "random(@,,)"
  361.     "randu(@)"
  362.     "readch(@,)"
  363.     "readln(@)"
  364.     "remlib(@)"
  365.     "reverse(@)"
  366.     "right(@,,)"
  367.     "seek(@,,)"
  368.     "setclip('@',)"
  369.     "show(@,,)"
  370.     "sign(@)"
  371.     "space(@,,)"
  372.     "storage(@,,,)"
  373.     "strip(@,,)"
  374.     "substr(@,,)"
  375.     "subword(@,,)"
  376.     "symbol(@)"
  377.     "time(@)"
  378.     "trace(@)"
  379.     "translate(@,,,)"
  380.     "trim(@)"
  381.     "upper(@)"
  382.     "value(@)"
  383.     "verify(@,,)"
  384.     "word(@,)"
  385.     "wordindex(@,)"
  386.     "wordlength(@,)"
  387.     "words(@)"
  388.     "writech(@,)"
  389.     "writeln(@)"
  390.     "x2c(@)"
  391.     "xrange(@,)"
  392.  
  393. /* Functions from support library) */
  394.  
  395.     "allocmem(@,)"
  396.     "closeport(@)"
  397.     "freemem(@,)"
  398.     "getarg(@,)"
  399.     "getpkt(@)"
  400.     "openport(@)"
  401.     "reply(@,)"
  402.     "showdir(@,)"
  403.     "showlist(@,)"
  404.     "statef(@)"
  405.     "waitpkt(@)"
  406.  
  407. /* New standard functions */
  408.  
  409.     "d2x(@,)"
  410.     "date(@,,)"
  411.     "digits()"
  412.     "find(@,)"
  413.     "form()"
  414.     "fuzz()"
  415.     "lines(@)"
  416.     "sourceline(@)"
  417.     "trunc(@,)"
  418.     "x2d(@)"
  419.  
  420. /* New support functions */
  421.  
  422.     "baddr(@)"
  423.     "delay(@)"
  424.     "delete(@)"
  425.     "forbid()"
  426.     "makedir(@)"
  427.     "next(@,)"
  428.     "null()"
  429.     "offset(@,)"
  430.     "permit()"
  431.     "rename(@,)"
  432.  
  433. /* RexxPlus extensions */
  434.  
  435.     "b2d(@)"
  436.     "b2o(@)"
  437.     "b2x(@)"
  438.     "c2o(@)"
  439.     "d2o(@)"
  440.     "linesize()"
  441.     "lines()"
  442.     "queued()"
  443.  
  444. /* RexxPlus transcendentals */
  445.  
  446.     "asin(@)"
  447.     "asinh(@)"
  448.     "atan(@)"
  449.     "atanh(@)"
  450.     "atan2(@,)"
  451.     "ceil(@)"
  452.     "cos(@)"
  453.     "cosh(@)"
  454.     "cot(@)"
  455.     "cotan(@)"
  456.     "csc(@)"
  457.     "exp(@)"
  458.     "fabs(@)"
  459.     "fact(@)"
  460.     "floor(@)"
  461.     "int(@)"
  462.     "ln(@)"
  463.     "log(@)"
  464.     "log10(@)"
  465.     "nint(@)"
  466.     "pow(@,)"
  467.     "power(@,)"
  468.     "sec(@)"
  469.     "sin(@)"
  470.     "sinh(@)"
  471.     "sqrt(@)"
  472.     "tan(@)"
  473.     "tanh(@)"
  474.     "xtoy(@,)"
  475.  
  476. /* rx_intui.library functions */
  477.  
  478.     "GetScreen(@,,,,,,)"
  479.     "GetWindow(@,,,,,,,,)"
  480.     "EndWindow(@)"
  481.     "EndScreen(@)"
  482.     "AddMenu(@,,,)"
  483.     "AddItem(@,,,,,,)"
  484.     "AddSub(@,,,,,,)"
  485.     "SetMenu(@,)"
  486.     "FreeMenu(@)"
  487.     "Text(@,,,)"
  488.     "Erase(@,,,)"
  489.     "SetDraw(@,,,)"
  490.     "AddGadget(@,,,,,,,,,,)"
  491.     "WaitMsg(@)"
  492.     "do while class > 0*nspec = WaitMsg(@)*nparse var spec class,,,*n*nend"
  493.     "ModIDCMP(@,,,)"
  494.     "SetTime(@,)"
  495.     "ModGadg(@,,,,,,,,,,)"
  496.     "GInfo(@,)"
  497.     "OnOffGadg(@,,)"
  498.     "MoveView(@,,,)"
  499.     "Peek(@,,)"
  500.     "Poke(@,,,)"
  501.     "RedrawWind(@,)"
  502.     "FBox(@,,,,)"
  503.     "Line(@,,,,,,,,,,,,,,)"
  504.     "Input(@,,,,)"
  505.     "MsgOne(@,)"
  506.     "MsgThree(@,,,)"
  507.     "IFFLoad(@,,)"
  508.     "IFFSave(@,)"
  509.     "Color(@)"
  510.     "Print(@,,,,,,)"
  511.     "GetFIO()"
  512.     "EndFIO()"
  513.     "FIOWindow(@,,,,,,,)"
  514.     "FIONW(@,,,,,,,,,)"
  515.     "AddEntry(@,,)"
  516.     "NewEntryList(@)"
  517.     "ClearEntries(@)"
  518.     "DeleteEntry(@,)"
  519.     "FirstEntry(@)"
  520.     "IsEntryThere(@,)"
  521.     "GetPath(@,)"
  522.  
  523. #
  524.  
  525.